From: Glenn Morris <rgm@gnu.org>
Date: Mon, 27 Aug 2007 07:11:32 +0000 (+0000)
Subject: (diff-find-file-name): Only accept regular files, to rule out
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~16884
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=bed9011cd5716a3a48d077bb25632444abfdbe96;p=emacs.git

(diff-find-file-name): Only accept regular files, to rule out
/dev/null, directories, etc.
---

diff --git a/lisp/diff-mode.el b/lisp/diff-mode.el
index be4c7e7b905..68f7995a494 100644
--- a/lisp/diff-mode.el
+++ b/lisp/diff-mode.el
@@ -682,7 +682,9 @@ PREFIX is only used internally: don't use it."
 	   ((or (null files)
 		(setq file (do* ((files files (cdr files))
 				 (file (car files) (car files)))
-			       ((or (null file) (file-exists-p file))
+			       ;; Use file-regular-p to avoid
+			       ;; /dev/null, directories, etc.
+			       ((or (null file) (file-regular-p file))
 				file))))
 	    file))
        ;; <foo>.rej patches implicitly apply to <foo>